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PROGRAMMABLE KEYBOARD STATUS A meeting of the FCC is scheduled around Sept.15, 
at which time the TI petition will be discussed. Bally currently feels that 
regardless of the decision, they will not be able to have a keyboard in pro¬ 
duction by the end of the year. 

SURVEY The subscriber survey has resulted in a fair turnout of responses 
from those interested in a keyboard/memory addition, and a number of useful 
suggestions as well. What is evolving now is a unit that could have 16 k of 
RAM that would accept a cassette input of the operating program, be it BASIC, 
COBOL, FORTRAN, or whatever(your choice) which would be loaded in about 2 
minutes at 1200 baud (while the picture tube was warming up), plus an additional 
8 or 16 K of onboard R M for the user's programs. There would be space to add 
more R M by chip insertion(especially the 8K version), plus connectors to allow 
outside memory addition. Serial and parallel ports would be available for the 
addition of other peripherals. Those who responded to the survey will be kept 
up to date. 

BLACK BOX GAME enclosed is a sort of Battleship game where the computer hides 
some "atoms” in a grid and you have to locate them. Use the diagram for clues. 

TUTORIAL ON SOUND adds more material from Chuck Thomka to last issue's discourse 


SLOT MACHINE CORRECTION requires the addition of a comma to the very end of 
line 1515 to stop the scrolling. 

BIG LETTERS continue to interest subscribers. Dennis Sprague modified the p.45 
program to write double size letters on command - the poke-ing is done auto¬ 
matically. Refer to the program on p. 45 and retain lines 9 thru 60, and line 
120. Replace the rest with: 65 A = 20190 
70 K = KP 

80 IF K = 13 GOTO 100 
90 $(A) = K; A = A+1; GOTO 70 
100 $(A) = 0 
105 CLEAR 

110 CALL (B); GOTO 65 

Dennis writes " 65 starts the display area, 100 shuts ofithe display if a zero 
is encountered. The ASCII values of K get poked into the display area 8 bits 
at a time." 

With the above, enter and RUN the program. The just key in whatever letter, 
number,character that you wish to see, punch GO, and there it is, twice as 
big as life. 

AMERICAN CONCERT FREQUENCIES chart has been prepared by Robert Hood, along with 
the closest Bally frequency: (all in Hertz) 

Note Standard Bally 
G 392 392 

G# 415.2 415 

A 440 440 

Bb 466.1 466 

B 493*9 494 

C 523.3 524 

_ am based on the equations of p.64 to solve 
for frequencies or tone register values, and this is found on p.70. 
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Note 

Standard 

Bally 

C 

261.7 

262 

c# 

277*3 

277 

D 

293*7 

294 

Eb 

311.1 

311 

E 

329.7 

330 

F 

349.2 

349 

F# 

370.1 

370 

In addition, 

Bob has furnished a 
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BAN OMAN CORRECTION COMMENT by Ernie 

Sams indicates that perhaps Rory Wahl has 
section in the last issue is needed to 
s: 

read: 

IF Q01 GOSUB 9600+(Ex10) 
or 1. If it is set to 0 it sends the pro- 
? 600 , 9610 , 9620 , etc. 

snted ONLY if the guess is wrong. It is NOT 
>rrect or if the letter has been previously 
line, B=E+1, must follow the IF statement. 
>9 GOTO 9000 statement is not satisfied 
ibered program line. The way Rory proposes, 
juess is made, right or wrong. The program 
jutine statement because it can't go past 
which time the program goes to 9000 , draws 
sr gets drawn on the screen, 
was originally written or the program will 

E=E+1; IF E=9 GOTO 9000 

surse as I felt that it would be of interest 
in a certain way. 

cies to register values and vica versa: 

i.i 1 11*7 .z i ,Gi = il i#i<?i#i#if lCiTj-hl i) i; ,1 ,= iR.H,., i 

a defective logic chip if Rory's coi 
make the program work. Ernie writes 
"Rory suggests that the line should 
2000 E=E+1 ; IF E=9 GOTO 9000; 
Q is a flag that is set to either 0 
gram to the man drawing routine at 

E is a counter that is to be incremt 
to be incremented if the guess is c( 
used. So the portion of the program 
Now, if the 'IF' portion of the IF 
the program defaults to the next nun 
E would be incremented each time a 
would never reach the man drawing r< 
the first IF statement until Ef=9 at 
the gun and shoots the man that nev 
So line 2000 MUST remain exactly as 
not work as intended: 

2000 IF #1 G0SUB 9600+(Exl 0); 

I have included all of Ernie's disc 
as a tutorial in why things are don 

BOB HOOD'S program to convert freque 
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TUTORIAL - SOUND SYNTHESIZER. Part 2 by Chuck Thomka 

Whenever RESET is pushed, the &( 16) to &(23) registers are set to fixed 
values.(This sort of thing is called DEFAULT) This also happens at POffiSR TURN 
ON. &(16) is set to 71, and &(1?) through &(23) are set to zero. 

Since pushing most keys on the keypad will generate a sound, one of the 
voices must be used. This means that since most keys have unique tones when 
pushed, they must be loading unique values into one or more of the registers. 

The voice used is the 'A' counter. Each key, when pushed, puts a value into the 
&(17) register that the 'A 1 counter will count up to. It will also put value 15 
into the &(22) register, that will adjust the 'A' volume to its maximum so that 
the resultant frequency can be heard. At the end of the time of outputting the 
tone, the &(17) and &(22) are both put back to zero. 

At anytime that the computer is stopped, the &(16) register will be set 
to 71, and &(17) arid &(22) will be set to zero. This may affect some results of 
sound effects in programs where you want those registers to be left at some 
other values. All the other registers will be as they were last adjusted to, so 
remember this if you still have a tone or noise remaining after the computer 
has stopped. 

Later in this article is a table of all the sound generating keys, their . 

&(17) values, the resultant frequencies, and any special notes about them. / 

The keys that do not generate sounds are 4** x » + . and -• These keys will 
modify the sounds created by the other keys if the modifying keys are used just 
prior to the normal sound keys. 

The divide key (4*) will make the sound one octave lower in frequency than 
normal. This is done by temporarily making the master counter &(16) count twice 
as far. So while &(16) is normally at 71. for this one note it will be set to 
143. As soon as the note has finished, &(16) will again return to 71 unless the 
next note is also preceeded by a i . 

The multiply key (x) will make the sound one octave higher in frequency. 

This is done by making &(16) equal 35 for the time the concerned note is sound¬ 
ing, at the end of which the &(16) will again return to 71• 

The plus (+) and minus (-) keys are only used in conjunction with the 
numbers 1 through 7. This was arranged so that the plus and minus sign would be 
meaningful in playing musical sharps or flats in the Bally-mentioned 3 octave 
musical scale. 

Another thing to mention ia the "Note Timer" or NT. For each number of NT 
■the notes played will be approximately 17 milliseconds long. An NT=0 results in 
no sound, while the maximum value of NT=255 results in about a 4.335 second note. 
(0.017 x 255 = 4.335) 

The P is used to extend the duration of a played note by taking the note 
timer and increasing it an additional NT quantity for each 0 following the note 
to be heard. For example, say we are to play a note while NT=10, and that this 
note is followed by 3 zeros, the resultant NT will be 40. After playing that 
modified NT, the NT will again return to normal (10 in this example) until 
called upon again. 

A funny thing about this method of extending the duration of a played note 
is that you still cannot play any note longer than 4.335 seconds. This is 
because if you had a note timer extended by way of using zeros after a printed 
character, and it would result in an NT>255» the final result would probably be 
less than 255. To explain what I mean, you have to know about binary numbers and 
that the NT register is only 8 bits wide. If, for example, we had an NT of 50 
and that some program that we are running is to print a character followed by 
5 zeros, we would expect a temporary NT result of 300 (1+5=6, 6x50=300) but an 
8 bit register's maximum bit count is only 255 while a binary conversion of 
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decimal 300 requires 9 bits (1 0010 1100). The result is that .••only the least 8 
bits (0010 1100) will be loaded into the NT register, so NT will temporarily 
be 44. This you see is a lot shorter than we had at first expected and even 
shorter than the normal NT of 50. 

TUTORIAL-SUBROUTINES 

If you have a process that you want to have repeated a number of times, it 
is convenient and memory-saving to use the technique called SUBROUTINE, which 
requires the commands GOSUB and RETURN. I recently received a short program 
from Bret Dabel and Vince Garzoli that has this situation, and I thought that 
it might be of interest to all to show how a program can be modified this way. 
The program as it arrived is: 


10 A=RND( 32000) 

20 INPUT "PLAYER #1 GUESS:" E 
JO IF A=B PRINT B, "IS RIGHT" 
40 IF A>B PRINT "MORE" 

50 IF A<B PRINT "LESS" 

60 INPUT "PLAYER #2 GUESS:" B 
70 IF A=B PRINT B. "IS RIGHT* 
80 IF A>E PRINT "MORE" 

90 IF A<B PRINT "LESS" 

100 INPUT "PLAYER tj GUESS:" B 
110 IF A=B PRINT B. "IS RIOT" 
120 IF A>E PRINT "MORE" 

130 IF A<E PRINT "LESS" 

140 INPUT "PLAYER #4 GUESS:" B 
150 IF A=E PRINT B. "IS RIOT" 
160 IF A>B PRINT "MORE" 

170 IF A<B PRINT "LESS" 

180 IF A=B GOTO 10 
190 GOTO 20 


To utilize the SUBROUTINE command, we make 
the process to be repeated into a set of 
generalized statements and end them with the 
RETURN command. Then whenever you wish to 
perform the process, you direct the machine 
to the proper location with the GOSUB command, 
and when the machine does its job, it reads 
RETURN which tells it to go back to where it 
left the main program and pick up the next 
line number. This last statement is quite 
important. 

As an example, lets review the Guessing Game 
program. We see that the A and B comparisons 
occur four times and so we can make a subroutine of them, giving them a set of 
line numbers away from the main program, as: 500 IF A = B PRINT B,"IS RIGHT" 

510 IF A>B PRINT "MORE" 

520 IF A<B PRINT "LESS" 

530 RETURN 

If by chance you have written the subroutine 
at lines 500 - 530 but later you have added 
so much program that 5OO-53O will be buried 
in the program length, you will have a problem, 
As the computer completes line 490, it will 
search for the last value of A and B and 
perform the comparisons asked for in lines 500 
through 520 (would you want that, then?) but 
it will HOW? when it gets to 530 because it is 
not in a subroutine mode and has no place to 
return to. To avoid this, you .jump around the 
subroutine, in our case with a 490 GOTO 540. 
Since this is a legitimate operation, it means 
therefore that the subroutine could actually 
be placed anywhere within the program, and a suitable jump statement added. 
Nesting of subroutines is possible. By this we mean that once you have gotten 
into the subroutine loop, you could have another subroutine called. The machine 
would perform the second subroutine and RETURN to the next line number of the 
first subroutine, and on its completion, go back to the main program. I believe 
that four such 'nests' are possible in the Bally BASIC, but one has to be very 
careful that each subroutine loop is completed - there cannot be any open loops. 
Diagramatieally, U Lk* Ik .Ik h 

,0 r-»SOO r<» Mo r-*Soo r» 4o r* SOO r*>8o C*>S6O r* tDCs 16 

70 Sc> ~^ SKO / 70-J sio I <\o-J S lo 

3o -J i ‘ ZO £j -° / Uc Sxo 


The program then reads: 


10 A=RND(32000) 

20 INPUT "PLAYER #1 GUESS 
30 GOSUB 500 
40 INPUT "PLAYER #2 GUESS 
50 GOSUB 500 

60 INPUT "PLAYER #3 GUESS 
70 GOSUB 500 

80 INPUT "PLAYER #4 GUESS 
90 GOSUB 500 
1 00 IF A=B GOTO 10 


500 IF A=B PRINT B, "IS RIGHT" 
510 IF A>B PRINT "MORE" 

520 IF A<E PRINT "LESS" 

530 RETURN 
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An 8 by 8 grid has a predetermined number of atoms hidden, one per square, 
under the grid squares, Berthold rays will be generated after you select a 
ray entry point after pressing the "1" key. Rays travel in straight lines per¬ 
pendicular to the grid edge, starting from the ray entry point, until they are 
absorbed or exit from the grid. They obey the following rules; 

1. A ray entering the grid on either side of an atom on the edge of the 
E^d is deflected backward and away from the edge atom. 

ray aimed between two atoms with an open square between them is reflee- 


e square diagonally of an atom 
n atom will be absorbed, and i 


deflected away 
absorption will 


ted back upon its' path. 

3. A ray coming within < 

90 degrees from that atom. 

4. A ray colliding with 
be signalled upon the screen 

5. A ray emerging from the grid will signal its • exit point. 

Ihe "2" key will ask for a col (0 to 7) and row (10 to 17 ) and will either 
mark or uraiark the grid position at their intersection where you suspect an 
atom is located. The »3» key will display the grid points where the atoms 
w»r» ynt marked as having atoms, and will grade your 




t if 


ir the grid for ___ w ___ 

cleared^ ^ ” 0t Clear ® d the ” y ' ke y. the preceding“grid atoms 
' program is loaded, the direct executed "PRINT SZ" command must print 

. 3 insufficient to execute. For this 

well as several obvious input edits. 


game, 
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at least 200, or the program strings will 
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This program is unconditionally guaranteed by the 
iut core limitation, or double your core dumps bad 
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Thank You 
B. Reany 

1106 E. Julia Dr. 
Perry, ri 32347 
































































































































































-arcadian 


POKE-ING PROGRAM allows you to load machine instructions into the @ string, 
which means that you can call several machine language subroutines from inside 
the BASIC. Developed by George Breadon, the program follows along with some 
data to be inserted that will call up our old buddy, ARCADIAN (ref.p.45) 

5 NT = 0 

10 A = 20180; B=A; For K=0 TO 13l 
20 INPUT @(K); NEXT K / 

30 FOR K = 0 TO 13; CLEAR 
40 CY = 0;PRINT K,@(K) 

50 D = KP; IF D=31 GOTO 80 
60 IF D=57 GOTO 90 
70 GOTO 50 

80 INPUT " CHAN GE=" , L; @( K )=L 
90 NEXT K 

100 A=B; FOR K= 0 TO 13 \_ 

110 A)=©(K); A=A+2; NEXT K J 

120 IF &(20) = 8 GOTO 30 
130 C=20180; GOSUB 160 
140 C=20190! GOSUB 160 
150 GOTO 120 

160 CLEAR; CALL (C); RETURN 

DATA to be inserted: This is all in machine 
level code. 


(INPUT MACHINE INSTRUCTIONS 
LINTO © STRING 

EDIT ROUTINE- HIT "STEP" 
KEY (D=57) TO STEP THRU 
MACHINE INSTRUCTIONS. 

HIT "ERASE" KEY (D=31 ) TO 
CHANGE MACHINE INSTR. 


POKE ©STRING INTO MEMORY 


HIT "GOTO" KEY TO BRANCH 
BACK TO EDIT ROUTINE AT 
ANY TIME 

INITIALIZE STARTING ADDRESs| 
[ FOR SUBROUTINE 52 


II 

-SL 

-43 

@(7) = 

27672 

1 

12341 

8 

20200 

2 

19480 

9 

-13871 

3 

3164 Or 3159 

10 

21057 

4 

-13871 

11 

16707 

5 

-43 

12 

18756 

6 

53 

13 

20033 

SOFTWARE PRODUCERS are invited to contact VIDEO 


' CALL SUBROUTINE 52 


© 0 thru 4 go into 20180 
while © 5 thru 13 go into 
20190, two at a time 


Anchorage Alaska, 99502, for distribution of their products thru the store 
up in the cold country. 

RETURNED BALLY UNITS are available from V. Jupe, Star Route Box 60, Carlotta, 
CA,~95328 These are working, and at less than $200. Also some games, write. 

ADS start here this time: 

SELL ARCADE with 4 controls, BASIC cassette and interface. BLACKJACK,BASEBALL, 
RED BARON, CROSSWORDS Interface has Jack for printer. Reasonable Offer to 
Bob Schwind 12311 W. Silver Spring Dr. Milwaukee, WI 53225 (414) 367-4804 


75 



ADS 


SELL ARCADE complete, includes PANZER ATTACK,CLOWNS,ESCAPE,FOOTBALL, 
BASEBALL,BINGO MATH,LETTER MATCH, PLACKJACK.ETC., BASIC and CASSETTE 
INTERFACE. Total original list price 560. First certified check for 
400, or best offer. B.PERLSON 6400 N.EIM TREE RD. MILWAUKEE WI, 

53217 414-352-1331 

Quality games on C-10 cassettes: STARBLASTER (2 player spacewar) and 
HAMMURABI (you control ancient Sumeria) at 7*each, both for 12. 

Dan. Pierce 229 Orville St Apt 1 Fairborn OH 45324 

LISTING for the game SUB SEARCH, a one-player item, at $1.25 

Marc Gladstein 1213^ S. ALFRED ST Los Angeles CA 90035 (213)658-5804 

Available through Sebree's Computing 456 Granite Ave., Monrovia CA 
91016- Games:3*95-UFO BATTLE, HIT THE PEDESTRIAN, SUBMARINE MINEFIELD; 
2.95-MUNCH!;5*50-DOWN THE TRENCH;$8,95-**SUPER WUMPUS**;$2.50-MATH 
ROUTINES (calculates Sine, Cosine, Arctangent, & Square Root!!). All 
programs with one page of documentation/instructions. Send for 
descriptions. Timothy Hays. 

A note from W&W Software that they have another cassette ready. 

SELL Bally ARCADE BPA 1100 with BASIC,FOOTBALL,BASEBALL, 4 other cassettes, 
tape interface $275. Geo. Evanoff, 10028 N.E. 28th Place, Bellevue WA 
98004 (206)-827-29l8 

One player game called SUBSEARCH, 1.25 for listing, only. Marc Gladstein 
1213! S. Alfred St. Los Angeles CA 90035 (213) 658-5804 


REVIEW of programs has been suggested by some subscribers, who are concerned 
about purchasing a 'pig in a poke'. IF someone else is willing to do a 
critical review of a program that some advertiser is also willing to submit, 
I will get the two parties together and accept the review for publication. 
The opinions will be the reviewers, not mine. 
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ARCADIAN 

Robert Fabris, stamp licker 
3626 Morrie Dr. 

San Jose, CA 95127 



10 A = RND (32000) 

20 INPUT "PLAYER #1 GUESSs" B 
30 IF A=B PRINT "MORE" 

40 IF A B PRINT "LESS" 

50 INPUT "PLAYER #2 GUESS:" B 
60 

10 A=RND(32000) 

20 INPUT "PLAYER #1 GUESS:" B 
30 IF A=B PRINT B, "IS RIGHT" 
40 IF A>B PRINT "MORE" 

50 IF A<B PRINT "LESS" 

60 INPUT "PLAYER #2 GUESS:" B 
70 IF A=B PRINT B, "IS RIGHT" 
80 IF A>B PRINT "MORE" 

90 IF A<B PRINT "LESS" 

100 INPUT "PLAYER #3 GUESS:" B 
110 IF A=B PRINT B, "IS RIGHT" 
120 IF A>B PRINT "MORE" 

130 IF A<B PRINT "LESS" 

140 INPUT "PLAYER #4 GUESS:" B 
150 IF A=B PRINT B, "IS RIGHT" 
160 IF A>B PRINT "MORE" 

170 IF A<B PRINT "LESS" 

180 IF A=B GOTO 10 
190 GOTO 20 


10 A=RND(32000) 

20 INPUT "PLAYER #1 GUESS:" B 
30 GOSUB 500 

40 INPUT "PLAYER #2 GUESS:" B 
50 GOSUB 500 

60 INPUT "PLAYER #3 GUESS:" B 
70 GOSUB 500 

80 INPUT "PLAYER #4 GUESS:" B 
90 GOSUB 500 
100 IF A=B GOTO 10 
110 GOTO 20 

500 IF A=B PRINT B, "IS RIGHT" 
510 IF A>B PRINT "MORE" 

520 IF A<B PRINT "LESS" 

530 RETURN 



BLACK BOX RULES: 


An 8 by 8 grid has a predetermined number of atoms hidden, one per square, 
under the grid squares, Berthold rays will be generated after you select a 
ray entry point aftfer pressing the "1" key, Rays travel in straight lines per¬ 
pendicular to the grid edge, starting from the ray entry point, until they are 
absorbed or exit from the grid. They obey the following rules? 

1. A ray entering the grid on either side of an atom on the edge of the 
grid is deflected backward and away from the edge atom, 

2. A ray aimed between two atoms with an open square between them is reflec¬ 
ted back upon its* path, 

3. A ray coming within one square diagonally of an atom is deflected away 
90 degrees from that atom, 

4. A ray colliding with an atom will be absorbed, and its* absorption will 
be signalled upon the screen 

5. A ray emerging from the grid wilL signal its * exit point. 

The '*2'' key will ask for a eol (0 to 7) and row (10 to 17) and will either 
mark or unmark the grid position at their intersection where you suspect an 
atom is located. The »3" key will display the grid points where the atoms 
were located, those which you marked as having atoms, and •(■all grade your 
guesses, and clear the grid for the next game. The zero key will restart the 
game, but if the grid was not cleared with the "3" key, the preceding grid atoms 
will not be cleared. 

After this program is loaded, the direct executed "PRINT SZ» command must print 
at least 200 ? or the program strings will be insufficient to execute. For this 
reason,, closing quote marks on literals, as well as several obvious input edits 
have been deleted. * 

On the listing, spaces have been added to separate necessary line elements from 
each other; asterisks replace the multiply »x", and the slash replaces the divide 
sign, thanks to a limited typewriter keyboard. At least, the 's' key is fixed 
so I don't have to lithp on it anymore. * 

This program is unconditionally guaranteed by the author to be smack up against 
your core limitation, or double your core dumps back. 



Thank You 
B, Reany 

1106 E. Julia Dr. 
Perry, FI 32347 



1 . 

2 . 

3 . 

10 BC=l4 
15 BC=BC+l6;FC=0 
20 CLEAR 
25 @(1)=2 
30 @(2)=2 

35 NT=50;CX=-4l m 

45 PRINT " BLACK BOX . 

50 CX=-47;CY=0;NT=0 ™ 

55 PRINT "HOW MANY ATOMS 
60 CX=-4l 

65 PRINT "DO YOU WANT? 

70 cy=- 32 ;input a 

100 FOR B=1 TO A 
105 C=RND(8)+10 *RND (8) 

110 IF @(C)=1 B=B-1 
115 @(c)=i 

120 NEXT B 
125 CLEAR;CY=32 

135 CX=~29;PRINT "0 1 2 3 4 5 6 7 
i T4S^CX=-47;PRINT "10»,;CX=67;PRINT "30 
4 'l4^CX=-47»PRINT "11",;CX=67;PRINT "31 
- “T50-CX=-47;PRINT "12",;CX=67;PRINT "32 
455~CX=-47; PRINT "13",;CX=67;PRINT "33 
l6o-CX=-4?;PRINT "l4»,;CX=67;PRINT "34 
445 CX=-47; PRINT »15 ",jCX=67;PRINT "35 
470 CX=~47;PRINT "1 6 ",;CX=67;PRINT "3o 
475 CX=~47;PRINT "17",;CX=6?;PRINT "37 
-»J8o cx=-35;phint "20 123456 7 "/,cy^o 

185 BOX 13,-4,97,65,3 

190 FOR B=-29 TO 55 STEP 12 

195 FOR C=24 TO -32 STEP -8 

200 BOX B,0,11,7,3 

205 NEXT C 

210 NEXT B 

250 FOR B=1 TO 2400 

255 IF &(22)=16 GOTO 15 

260 IF &(23)=8 GOTO 400 

265 IF &(22)=8 GOTO 300 

270 IF &(21)=8 GOTO 800 

2?5 NEXT B 

280 FC=9;G0T0 250 

300 CX=~T7;CY=40;INPUT C 

310 CX=~4l;CY=40;INPUT R 

315 C=12+C-29;R=24-8*(R-10) 

320 BOX C,R,3,3,3 

325 CY=40;PRINT " ", 

330 NT=3;G0T0 250 


400 CY=40;CX=-77;INPUT R 
405 NT=0;@(2)=@(2)+1 
410 B=R/10;C=RM+1 
415 IF E=0 J=C;K=0;L=0;M=1 
420 IF B=1 J=0;K=C;L=1;K=0 
425 IF B=2 J=C;K=9;L=0;M=-1 
430 IF B=3 J=9;K=C;L=-1;M=0 
450 CX=-77;CY=40;D=10*J+K 
460 IF @(D)=1 PRINT "ABSORBED"; 

GOTO 325 

465 IF L=0 S=D+10+M;T=S-20 

470 IF M=0 S=D+1 +10*L; T=S-2 

471 IF T<1 T=1 

475 IF @(S)=1 IF ©(T)=1 D=-L; 

M=-M;GOTO 500 
480 IF L=0 IF @(S)=1 L=-1;M=0; 

GOTO 500 

485 IF L=0 IF @(T)=1 L=1;M=0; 

GOTO 500 

490 IF K=0 IF @(S)=1 M=-1;L=0; 

GOTO 500 

495 IF M=0 IF @(T)=1 M=1;L=0 

500 J=J+L;K=K4M 

505 IF J<1 GOTO 550 

510 IF J>8 GOTO 550 

515 IF K<1 GOTO 550 

520 IF K>8 GOTO 550 

525 GOTO 450 

550 K=32-8*K;J=12*J-41 

560 NT=50 

565 FOR B=1 TO 50 

570 BOX J,K,11,7,3 

575 NEXT B 

580 nt=3;G0T0325 

800 FOR B=11 TO 88 

805 C=B/10-1;D=RM-1 

820 C=-29 +C *12;D=24-D*8 

830 IF ®(B)=1 BOX C,D,?,5,3:@(B)x0 

840 IF PX(C,D)=1 @(1)=@(1)+1 

850 NEXT B ' ' ' ' " 

855 NT=50;CY=40;CX=-35 
865 PRINT "FINISH 
870 NT=3;CLEAR 
875 IF ©(1)>10 GOTO 900 
880 PRINT "EUREKAl 

885 CY=0;PRINT "YOU HAD ",#2,A,"AT0MS 

890 PRINT "YOU USED ",#1 ,©(2)-2," RAYS 

895 GOTO 250 

900 PRINT » SORRY 

910 GOTO 250 
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1 NT-0 

2 PRINT 

3 PRINT 

4 PRINT 

5 PRINT 
f, PMNt 


7 PRINT 
F PRIHT 
"I PRW 


u GUF 551 NT GWBiSf 

" BY £>RET 0A3EI W ViDCR 6-AP.70L 


10 A=RN17 (32>000). 

20 INPUT "YOUR &UE55P'B 
30 if 4-B PRINT 8, "tf rig-HT/" 

WtF A>B PRINT "f/lOREV' 

50 \F /KB PRINT U LE55\ 

60 1HP1AT "PLAV^ft 2 '6H/t£T5,' vx B 


10 IF/F9 PR\MT B> T5 RIGHT.'" 

5D If APB PRINT 
W IF A <B PRINT "LB5p l 
100 INPUT "CIPHER 3 (GUKS5''"e 
110 Ip A'$ PRINT B, "G RIGHT/" 
120IF A>B> BR(Ni " MoREt" 

1301F /1<B PRINT " LE65P 
\HQ CNPMT "PLAYER H GEE 64. ,v \& 
)^IFa=B PRINT £^T5 RIGHT/ 
160F K 7$ PRINT 
\70IFA<B PRINT "LE5S^ 

Ip IF A-B> GOTO \0 
m (TO TO tlO 



AUGUST 2, 1979 


DEAR BOB, 

If Rory Wohl's computer works with the changes in the BANGMAN program [/ 

that he suggested on page 58 of the ARCADIAN it has a faulty logic chip. ^ 

He suggests the line should read: 

2000 E=E+1; IF E=9 GOTO 9000; IF Q # 1 GOSUB 9600+(E x 10) 

Q is a flag that is set to either 0 or 1. If it is set to 0 it sends 

the program to the man drawing routine at 9600, 9610, 9620, etc. 

E is a counter that is to be incremented ONLY if the guess is wrong. 

It is NOT to be incremented if the guess is correct or if the letter 
has been previously used. So the portion of the program line, E=E+1, 
must follow the IF Q # 1 GOSUB 9600+(E x 10) statement. 

Now, if the 'IF' portion of the IF E=9 GOTO 9000 statement is not 

satisfied the program defaults to the next numbered program line. 

The way Rory proposes, E would be incremented each time a guess is 
made, right or wrong. The program WOULD never reach the man drawing 
routine statement because it can't go past the first IF statement 
until E= 9 at which time the program goes to 9000, draws the gun and 
shoots the man that never gets drawn on the screen. 

So line 2000 MUST remain exactly as was originally written or the 
program will not work as intended: 

2000 IF Q # 1 GOSUB 9600+(E x 10); E=E+1; IF E=9 GOTO 9000 

NOW FOR SOME OTHER STUFF. I'M WRITING THIS ON MY TRS-80 WHICH DOESN'T 
HAVE UPPER AND LOWER CASE. HOWEVER, I FOUND THAT IF I HOLD THE SHIFT KEY 
DOWN WHEN I'M TYPING THAT THE LETTERS TRANSMITTED TO MY TRENDATA SELECTRIC 
COME OUT IN LOWER CASE. IT MAKES THE TYPING QUITE SLOW AND I'M NEVER 
SURE I HAVE A LOWER CASE LETTER UNTIL I SEE IT PRINTED BECAUSE THE 
SCREEN DISPLAYS ONLY UPPER CASE. 

BY THE WAY, I ORDERED THE SERVICE MANUAL AND THE HACKER'S MANUAL SOME TIME 
AGO. YOU SENT THE SERVICE MANUAL RIGHT AWAY BUT AS FAR AS I KNOW I HAVEN'T 
RECEIVED THE HACKER'S MANUAL. ONE OF THE FELLOWS HERE AT WESTERN WASHINGTON 
UNIVERSITY SAID HE WOULD TRY TO INTERFACE MY SELECTRIC AS SOON AS I GOT 
SOME SCHEMATICS 

ISSUE NUMBER 8 IS GREAT. THEY ARE GETTING BETTER ALL THE TIME. 

CHUCK THOMKA’S WRITE-UP ON THE MUSIC SYNTHESIZER WAS EXCEPTIONAL. 

I DON'T KNOW HOW SOME PEOPLE CAN COME UP WITH SO MUCH INFORMATION. 

THE TOUCH TONE SIMULATOR WORKS PERFECTLY AND THE SOUND GRAPH IS A 
CLEVER WAY OF DISPLAYING TONE TESTING DATA. I MADE A PROGRAM SOMETHING 
LIKE THAT WHEN I FIRST TRIED OUT THE 5(16), ETC. REGISTERS BUT I DIDN'T 
PUT IN THE GRAPH. 



TO YOUR QUESTIONS: 


NOT. 

SURE. IT DEPENDS ON THE LANGUAGE CAPABILITIES AND THE PERIPHERAL 

POSSIBILITIES. I REALLY WOULD PREFER ZGRASS BASIC, THAT'S ONE OF THE 
REASONS I'VE BEEN WAITING, AND I'M GOING TO WANT A DISC DRIVE OR TWO 
AND AN RS-232 INTERFACE FOR MY PRINTER. ALSO, I WOULD PREFER TO HAVE SOME 
STRONG SUPPORT FROM A COMPANY THAT'S GOING TO BE AROUND FOR A WHILE 
BUT SOMETIMES ONE HAS TO TAKE WHAT IS AVAILABLE NOT WHAT HE WOULD 
LIKE TO HAVE. 

4. MY NEW BALLY ARCADE SERIAL NUMBER IS: #20359, MODEL BPA 1100. 



SINCERELY, 



ERNEST W. SAMS 

248 SOUTH FOREST STREET 

BELLINGHAM, WA 98225 
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MORE INFORMATION ON THE SOUND SYNTHESIZER 
By: Chuck Thomka 


Whenever "RESET" is pushed, the 6c 16 to 6c23 registers are set to fixed values. This 
also happens at POWER TURN ON. 6c 16 is set to 71 and 6c 17 through 6c23 are set 
to zero. fault i/a tot 7 

Since pushing most keys on the keypad will generate a sound, one of the voices 
must be used. This means that since most keys have unique tones when pushed, 
they must be loading unique values into one or more of the registers. The voice 
used is the 'A' counter. Each key, when pushed, puts a value into the 6c 17 register 
that the 'A' counter will count up to. It also will put value 15 into the 6c22 register, 
that will adjust the 'A' volume to maximum so that the resultant frequency can be 
heard. At the end of the time of outputting the tone the 6c 17 and 6c22 are both put 
back to zero. 

At anytime that the computer is stopped, the 6c 16 register will be set to 71, and 
6c 17 and 6c22 will be set to zero. This may affect some results of sound effects in 
programs where you want those registers to be left at some other values. All the 
other registers will be as they were last adjusted to, so remember this if you still 
have a tone or noise remaining on after the computer has stopped. 

Later in this article is a table of all the sound generating keys, their 6c 17 values, 
the resultant frequencies, and any special notes about them. 
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The keys that do not generate sounds are-^, X, + and These keys will modify the 
sounds created by the other keys if the modifying keys are used just prior to the 
normal saund keys. 

The -f* (divide) key will make the sound one octave lower in frequency than normal. 
This is done by temporarily making the master counter &16 count twice as far. So 
while &16 is normally at 71, for this one note, it will be set to 143. As soon as the 
note has finished <5cl6 will again return to 71 unless the next note is also preceeded 
by a 

The X (multiply) key will make the sound one octave higher in frequency. This is 
done by making &16 equal 35 for the time the concerned note is sounding. At the 
end of which, &16 will again return to 71. 

The + (plus) and - (minus) keys are only used in conjunction with the numbers 1 
through 7. This was arranged so that the plus and minus sign would be meaningful 
in playing musical diarps or flats in the Bally mentioned 3 octave musical scale. 

Another thing to mention is the "Note Timer" or NT; for each number of NT, the 
notes played will be approximately 17 milliseconds long. An NT=0 results in no 
sound, while the maximum number of NT=255 results in about a 4.335 second 
(.017X255=4.335) note. It is interesting to observe the effect of printing a 
character on the TV that is followed by a 0. The "player piano" program in the 
Bally Programmed Instruction Course uses the 0 (zero) to extend the duration of a 
played note. How it does this, (for only the one note to be played) it takes the note 
timer and increases it an additional NT quantity for each 0 following the note to be 
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heard. For example, say we are to play a note while the NT=10, and that this note 
is followed by 3 zeros, the resultant NT will be 40. After playing that modified NT, 
the NT will again return to normal (10, in this example) until called upon again. 

A funny thing about this method of extending the duration of a played note is that 
you still cannot play any note longer than 4.335 seconds. This is because if you had 
a note timer extended by way of using zeros after a printed character, and it would 
result in an NT>255, the final result would probably be less than 255. To explain 
what I mean, you have to know about binary numbers and that the NT register is 
only 8 bits wide. If, for example, we had an NT of 50 and that some program that 
we are ruining is to print a character followed by 5 zeros, we would expect a 
temporary NT result of 300 (1+5=6,6X50=300) but an 8 bit register's maximum bit 
count is only 255, while a binary conversion of decimal 300 requires 9 bits (1 0010 
1100). The result is that only the least 8 bits (0010 1100) will be loaded into the NT 
register, so NT will temporarily be 44. This, you see is a lot shorter than we had at 
first expected and even shorter than the normal NT of 50. 

Finishing up, I am now giving you a table of all the possible frequencies generated 
by printing to the TV, the characters that will create them and also resultant 
frequencies if the character is preceeded by a-f or X sign. 
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